#pragma once

#include <iostream>
#include <cstring>
#include <cerrno>
#include <cassert>
#include <string>
#include <sys/types.h>
#include <sys/socket.h>
#include <arpa/inet.h>
#include <netinet/in.h>
#include <unistd.h>
#include <sys/wait.h>
#include <signal.h>
#include <pthread.h>
#include <memory>

#include "ThreadPool/log.hpp"
#include "ThreadPool/threadPool.hpp"
#include "ThreadPool/Task.hpp"

// static void service(int sock, const std::string &clientip, const uint16_t clientport)
// {
//     char buffer[1024];
//     while (true)
//     {
//         ssize_t s = read(sock, buffer, sizeof(buffer) - 1);
//         if (s > 0)
//         {
//             buffer[s] = 0;
//             std::cout << clientip << ":" << clientport << "#" << buffer << std::endl;
//         }
//         else if (s == 0) // 对端关闭连接
//         {
//             logMessage(NORMAL, "%s:%d shutdown, me too!", clientip.c_str(), clientport);
//             break;
//         }
//         else
//         {
//             logMessage(ERROR, "read socket error, %d:%s", errno, strerror(errno));
//             break;
//         }
//         write(sock, buffer, strlen(buffer));
//     }
//     close(sock);
// }
static void change(int sock, const std::string &clientip, const uint16_t clientport, const std::string &thread_name)
{
    char buffer[1024];

    ssize_t s = read(sock, buffer, sizeof(buffer) - 1);
    if (s > 0)
    {
        buffer[s] = 0;
        std::cout << thread_name << "| " << clientip << ":" << clientport << "#" << buffer << std::endl;

        char* start = buffer;
        std::string message;
        while(*start)
        {
            char c;
            if(islower(*start)) c = toupper(*start);
            else c = *start;
            message.push_back(c);
            start++;
        }
        write(sock, message.c_str(), message.size());
    }
    else if (s == 0) // 对端关闭连接
    {
        logMessage(NORMAL, "%s:%d shutdown, me too!", clientip.c_str(), clientport);
    }
    else
    {
        logMessage(ERROR, "read socket error, %d:%s", errno, strerror(errno));
    }

    close(sock);
}
// class ThreadData//
// {
// public:
//     std::string _ip;
//     uint16_t _port;
//     int _sock;
// };
class TcpServer
{
    const static int gbacklog = 20;

    // static void *threadRoutine(void *args)
    // {
    //     pthread_detach(pthread_self()); // 线程分离，不需要pthread_join
    //     ThreadData *td = (ThreadData *)args;
    //     service(td->_sock, td->_ip, td->_sock);
    //     delete td;

    //     return nullptr;
    // }

public:
    TcpServer(uint16_t port, std::string ip = "")
        : _port(port), _ip(ip), _listensock(-1), _threadpool_ptr(new ThreadPool<Task>())
    {
    }
    void initServer()
    {
        _listensock = socket(AF_INET, SOCK_STREAM, 0);
        if (_listensock < 0)
        {
            logMessage(FATAL, "create socket error, %d:%s", errno, strerror(errno));
            exit(2);
        }
        logMessage(NORMAL, "create socket success, _listensock: %d", _listensock);

        struct sockaddr_in local;
        local.sin_family = AF_INET;
        local.sin_port = htons(_port);
        local.sin_addr.s_addr = _ip.empty() ? INADDR_ANY : inet_addr(_ip.c_str());

        if (bind(_listensock, (struct sockaddr *)&local, sizeof(local)) < 0)
        {
            logMessage(FATAL, "bind error, %d:%s", errno, strerror(errno));
            exit(3);
        }

        if (listen(_listensock, gbacklog) < 0)
        {
            logMessage(FATAL, "listen error, %d:%s", errno, strerror(errno));
            exit(4);
        }

        logMessage(NORMAL, "init server success");
    }
    void start()
    {
        _threadpool_ptr->run();
        // signal(SIGCHLD, SIG_IGN); // 子进程退出，自动释放僵尸状态
        while (true)
        {
            // sleep(1);
            struct sockaddr_in src;
            socklen_t len = sizeof(src);
            // 获取连接
            int servicesock = accept(_listensock, (struct sockaddr *)&src, &len);
            if (servicesock < 0)
            {
                logMessage(ERROR, "accept error, %d:%s", errno, strerror(errno));
                continue;
            }
            // 获取连接成功
            uint16_t client_port = ntohs(src.sin_port);
            std::string client_ip = inet_ntoa(src.sin_addr);
            logMessage(NORMAL, "link success, servicesock: %d | %s : %d |\n", servicesock, client_ip.c_str(), client_port);

            // verson 4 线程池
            // Task t(servicesock, client_ip, client_port, service);
            Task t(servicesock, client_ip, client_port, change);
            _threadpool_ptr->pushTask(t);

            // // verson 3 多线程
            // ThreadData *td = new ThreadData();
            // td->_ip = client_ip;
            // td->_port = client_port;
            // td->_sock = servicesock;
            // pthread_t tid;
            // pthread_create(&tid, nullptr, threadRoutine, td);

            // //////////////////////////////////////////////////////////////////////////////////
            // // version 2.1
            // pid_t id = fork();
            // assert(id != -1);
            // if (id == 0)
            // {
            //     close(_listensock);
            //     if(fork() > 0/*子进程本身*/) exit(0);//子进程本身立即退出
            //     //子进程的子进程，孤儿进程，提供服务，os接管
            //     service(servicesock, client_ip, client_port);
            //     exit(0);
            // }
            // waitpid(id, nullptr, 0);//不会阻塞，子进程已经退出
            // close(servicesock);
            //////////////////////////////////////////////////////////////////////////////////
            // 通信 version 1
            // service(servicesock, client_ip, client_port);
            // close(servicesock);
            // std::cout << "关闭servicesock: " << servicesock << std::endl;

            // //version 2
            // pid_t id = fork();
            // assert(id != -1);
            // if(id == 0)
            // {
            //     close(_listensock);
            //     service(servicesock, client_ip, client_port);
            //     exit(0);
            // }
            // close(servicesock);
        }
    }
    ~TcpServer() {}

private:
    uint16_t _port;
    std::string _ip;
    int _listensock;

    std::unique_ptr<ThreadPool<Task>> _threadpool_ptr;
};